<%@ language=VBScript %>
Sample ASP
Goedendag.
Welkom De Tijd Is Nu <%=Time()%> Op De Computron-Online Server
<%
'The following code iterates through the cookie collection.
'If a given cookie represents a cookie dictionary, then
'a second, internal for…each construct iterates through
'it retrieving the value of each subkey in the dictionary.
Dim strCookie
Dim strSubKey
Dim str3rdCookieValue
Dim strCompanyCookieValue
For Each strCookie In Request.Cookies
If Request.Cookies(strCookie).HasKeys Then
' The cookie is a dictionary. Iterate through it.
%>
The cookie dictionary <%=strCookie%> has the
Following values:
<%
For Each strSubKey In Request.Cookies(strCookie)
%>
SubKey: <%= strSubKey %>
Value:
<%=Request.Cookies(strCookie)(strSubKey)%>
<%
Next
Else
' The cookie represents a single value.
%>
The cookie <%=strCookie%> has the following value:
<%=Request.Cookies(strCookie)%>
<%
End If
%>
Hallo
<%
Next
' The following code retrieves the value of the third cookie
' in the Cookie collection.
'str3rdCookieValue = Request.Cookies(1)
' The following code retrieves the value of the "company" cookie
' in the Cookie collection.
'strCompanyCookieValue = Request.Cookies("Company")
%>
Goedendag.
Welkom De Tijd2 Is Nu <%=Time()%> Op De Computron-Online Server